Desktop Pictures Prefs

		set background pattern to aPat
	end if
	quit
	return hasPict
end tell


tell application "Appearance"
	set aPict to picture file of monitor 1
	set hasPict to (aPict as string) is not equal to "no picture"
	if hasPict then
		set aPat to background pattern
		set picture file of monitor 1 to no picture


Appearance

Desktop Pictures can conflict with Slide Show.  Please use the Appearance control panel to remove any picture. 

Your current Desktop Picture conflicted with Slide Show and has been disabled.  Use the Appearance control panel when you wish to restore this picture. 

		set desktop pattern to aPat
	end if
	quit
	return hasPict
end tell


tell application "Desktop Pictures"
	set aPict to (get desktop picture name for screen 0)
	set hasPict to (aPict as string) is not equal to ""
	if hasPict then
		set aPat to (get desktop pattern)
		clear desktop picture


Desktop Pictures

Desktop Pictures can conflict with Slide Show.  Please use the Desktop Pictures control panel to remove any picture. 

Your current Desktop Picture conflicted with Slide Show and has been disabled.  Use the Desktop Pictures control panel when you wish to restore this picture.